home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 January / PCWorld_2007-01_cd.bin / v cisle / autoit / autoit-v3.2.0.1-setup.exe / Examples / count-while.au3 < prev    next >
Text File  |  2006-06-20  |  907b  |  37 lines
  1. ;
  2. ; AutoIt Version: 3.0
  3. ; Language:       English
  4. ; Platform:       Win9x/NT
  5. ; Author:         Jonathan Bennett (jon at hiddensoft com)
  6. ;
  7. ; Script Function:
  8. ;   Counts to 5 using a "while" loop
  9.  
  10.  
  11. ; Prompt the user to run the script - use a Yes/No prompt (4 - see help file)
  12. $answer = MsgBox(4, "AutoIt Example", "This script will count to 5 using a 'While' loop.  Run?")
  13.  
  14.  
  15. ; Check the user's answer to the prompt (see the help file for MsgBox return values)
  16. ; If "No" was clicked (7) then exit the script
  17. If $answer = 7 Then
  18.     MsgBox(0, "AutoIt Example", "OK.  Bye!")
  19.     Exit
  20. EndIf
  21.  
  22.  
  23. ; Set the counter
  24. $count = 0
  25.  
  26. ; Execute the loop "While" the counter is less than 5
  27. While $count < 5
  28.     ; Increase the count by one
  29.     $count = $count + 1  
  30.     
  31.     ; Print the count
  32.     MsgBox(0, "AutoIt Example", "Count is: " & $count)
  33. Wend
  34.         
  35. ; Finished!
  36. MsgBox(0, "AutoIt Example", "Finished!")
  37.